home *** CD-ROM | disk | FTP | other *** search
/ EDUCORP 8 / Educorp2Compilation.sit / educorp2 / Demos / Kroy Demo / Kroy Sign Studio™ Demo / card_19524.txt < prev    next >
Encoding:
Text File  |  1988-12-01  |  4.0 KB  |  193 lines
  1. -- card: 19524 from stack: in
  2. -- bmap block id: 23196
  3. -- flags: 4000
  4. -- background id: 7352
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put card field "info" into textString
  9.   set the lockText of card field "info" to false
  10.   put empty into card field "info"
  11.   show card field "info"
  12.   set lockScreen to false
  13.   type tab
  14.   repeat with charNumber = 1 to the number of characters in textString
  15.     type char charNumber of textstring
  16.   end repeat
  17.   set the lockText of card field "info" to true
  18.   wait 1 seconds
  19.   put card field "info2" into textString
  20.   set the lockText of card field "info2" to false
  21.   put empty into card field "info2"
  22.   show card field "info2"
  23.   set lockScreen to false
  24.   type tab
  25.   repeat with charNumber = 1 to the number of characters in textString
  26.     type char charNumber of textstring
  27.   end repeat
  28.   set the lockText of card field "info2" to true
  29.   wait 3 seconds
  30.   hide card field "info"
  31.   hide card field "info2"
  32. end openCard
  33.  
  34.  
  35. -- part 1 (button)
  36. -- low flags: 00
  37. -- high flags: 2004
  38. -- rect: left=144 top=314 right=342 bottom=185
  39. -- title width / last selected line: 0
  40. -- icon id / first selected line: 9301 / 9301
  41. -- text alignment: 1
  42. -- font id: 0
  43. -- text size: 12
  44. -- style flags: 0
  45. -- line height: 16
  46. -- part name: PREV
  47. ----- HyperTalk script -----
  48. on mouseUp
  49.   go prev
  50. end mouseUp
  51.  
  52.  
  53.  
  54. -- part 2 (button)
  55. -- low flags: 00
  56. -- high flags: 2004
  57. -- rect: left=248 top=314 right=342 bottom=289
  58. -- title width / last selected line: 0
  59. -- icon id / first selected line: 1011 / 1011
  60. -- text alignment: 1
  61. -- font id: 0
  62. -- text size: 12
  63. -- style flags: 0
  64. -- line height: 16
  65. -- part name: HOME
  66. ----- HyperTalk script -----
  67. on mouseUp
  68.   go home
  69. end mouseUp
  70.  
  71.  
  72.  
  73. -- part 3 (button)
  74. -- low flags: 00
  75. -- high flags: 2004
  76. -- rect: left=354 top=314 right=342 bottom=395
  77. -- title width / last selected line: 0
  78. -- icon id / first selected line: 27009 / 27009
  79. -- text alignment: 1
  80. -- font id: 0
  81. -- text size: 12
  82. -- style flags: 0
  83. -- line height: 16
  84. -- part name: NEXT
  85. ----- HyperTalk script -----
  86. on mouseUp
  87.   go next
  88. end mouseUp
  89.  
  90.  
  91.  
  92. -- part 5 (button)
  93. -- low flags: 00
  94. -- high flags: 0000
  95. -- rect: left=253 top=240 right=268 bottom=372
  96. -- title width / last selected line: 0
  97. -- icon id / first selected line: 0 / 0
  98. -- text alignment: 1
  99. -- font id: 0
  100. -- text size: 12
  101. -- style flags: 0
  102. -- line height: 16
  103. -- part name: next also
  104. ----- HyperTalk script -----
  105. on mouseUp
  106.   go next
  107. end mouseUp
  108.  
  109.  
  110.  
  111.  
  112. -- part 6 (button)
  113. -- low flags: 00
  114. -- high flags: 0000
  115. -- rect: left=8 top=24 right=41 bottom=27
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 0 / 0
  118. -- text alignment: 1
  119. -- font id: 0
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: next also
  124. ----- HyperTalk script -----
  125. on mouseUp
  126.   go to card id 9455
  127. end mouseUp
  128.  
  129.  
  130.  
  131.  
  132. -- part 7 (button)
  133. -- low flags: 00
  134. -- high flags: 2004
  135. -- rect: left=19 top=315 right=342 bottom=59
  136. -- title width / last selected line: 0
  137. -- icon id / first selected line: 32462 / 32462
  138. -- text alignment: 1
  139. -- font id: 0
  140. -- text size: 12
  141. -- style flags: 0
  142. -- line height: 16
  143. -- part name: New Button
  144. ----- HyperTalk script -----
  145. on mouseStillDown
  146.   show card field "info"
  147.   show card field "info2"
  148. end mouseStillDown
  149. on mouseUp
  150.   hide card field "info"
  151.   hide card field "info2"
  152. end mouseUp
  153.  
  154.  
  155. -- part 8 (field)
  156. -- low flags: 81
  157. -- high flags: 0004
  158. -- rect: left=53 top=208 right=257 bottom=260
  159. -- title width / last selected line: 0
  160. -- icon id / first selected line: 0 / 0
  161. -- text alignment: 0
  162. -- font id: 3
  163. -- text size: 12
  164. -- style flags: 16384
  165. -- line height: 14
  166. -- part name: info2
  167.  
  168.  
  169. -- part 10 (field)
  170. -- low flags: 81
  171. -- high flags: 0004
  172. -- rect: left=145 top=97 right=146 bottom=348
  173. -- title width / last selected line: 0
  174. -- icon id / first selected line: 0 / 0
  175. -- text alignment: 0
  176. -- font id: 3
  177. -- text size: 12
  178. -- style flags: 16384
  179. -- line height: 14
  180. -- part name: info
  181.  
  182.  
  183. -- part contents for card part 10
  184. ----- text -----
  185. The following procedure is used to make a sign with a background pattern.
  186.  
  187.  
  188.  
  189. -- part contents for card part 8
  190. ----- text -----
  191. To unlock the sign border select it, then use "Unlock" from the "Arrange" menu.
  192.  
  193.